home *** CD-ROM | disk | FTP | other *** search
/ Sprite 1984 - 1993 / Sprite 1984 - 1993.iso / lib / ditroff / tmac.g < prev    next >
Text File  |  1988-12-18  |  578b  |  47 lines
  1. .de IS  \"    ideal picture
  2. .nr g7 \\n(.u
  3. .ls 1
  4. ..
  5. .de IE
  6. .if \\n(g7 .fi
  7. .ls
  8. ..
  9. .de IF
  10. .if \\n(g7 .fi
  11. .ls
  12. ..
  13. .de PS    \"     start picture (bwk) $1 is height, $2 is width in units
  14. .if t .sp .3
  15. .in (\\n(.lu-\\$2u)/2u
  16. .ne \\$1u
  17. .nr g7 \\n(.u
  18. .ls 1
  19. ..
  20. .de PE
  21. .in
  22. .if \\n(g7 .fi
  23. .if t .sp .6
  24. .ls
  25. ..
  26. .de GS    \"    GRN called with C (default), L or R  (g1=width, g2=height)
  27. .nr g7 (\\n(.lu-\\n(g1u)/2u
  28. .if "\\$1"L" .nr g7 \\n(.iu
  29. .if "\\$1"R" .nr g7 \\n(.lu-\\n(g1u
  30. .in \\n(g7u
  31. .nr g7 \\n(.u
  32. .ls 1
  33. .nf
  34. .ne \\n(g2u
  35. ..
  36. .de GE
  37. .ls
  38. .in
  39. .if \\n(g7 .fi
  40. .if t .sp .6
  41. ..
  42. .de GF
  43. .ls
  44. .in
  45. .if \\n(g7 .fi
  46. ..
  47.